1 INPUTT,M,J:T%=T+J+(J+(M<3))/4+3*M+2*(M>2)-INT((M-1+(M>8))/2)+2:PRINTT%-7*INT(T%/7)
2 :
3 :
4 REM DATUM WANDELN